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Increased speed and reduced cost in the identification of unknown chemical compounds resulted when General Electric at 
Valley Forge, Pa., put together this system. A TEKTRONIX 4051 and 4907, A.M.S. Solver One interface and software. Perkin- 
Elmer Gas Chromatograph/Mass Spectrometer and a Columbia Scientific digital readout comprise the powerful analysis tool. 
(Courtesy of General Electric, Valley Forge, Pa.) 



A 4051-Based Gas Chromatograph/Mass Spectrometer 
Data System 



by Nick Bazil 

A.M.S. Inc. 

Gas Chromatograph/ Mass Spectrometer systems are 
powerful tools for identifying and verifying unknown 
chemical compounds. They can be used to identify a 
pollutant in a water system, for instance, or any chemical 
sample. At General Electric Co. in Valley Forge, PA, a 
Gas Chromatograph/ Mass Spectrometer system is in 
place in their analytical chemistry lab; its heart is a 4051 
Graphic System with a 4907 File Manager. The 4051 
handles the data reduction and analysis for the system, 
while the 4907 is the key to quickly matching the 
unknown sample against the library of known com- 
pounds. 

In the past, data reduction and analysis for a Gas 
Chromatograph/ Mass Spectrometer combination re- 
quired a minicomputer, a requirement that could add fifty 
to eighty thousand dollars to the cost of a system. The 
high cost made it difficult to justify such data systems. But 



the advent of the powerful 4907 File Manager, coupled 
with the A.M.S. Solver One interface and application 
software package, has considerably reduced the cost of 
such systems. 

The Gas Chromatograph/ Mass Spectrometer system 
began with a 4051 Graphic System and an A.M.S. 
interface; the interface collected data from a Perkin- 
Elmer Gas Chromatograph/ Mass Spectrometer system, 
through a Columbia Scientific digital readout connected 
to them. The digital readout unit reads the peaks from the 
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Gas Chromatograph and Mass Spectrometer, sorts the 
data, and performs an intensity count (Fig. 1). 




Fig. 1. System Configuration. 

In this original system, G.E.’s Bob Ross intended to 
simply collect, normalize, graph, and tabulate the data 
locally, taking advantage of the 405 1’s high resolution 
display. (Refer to Figs. 2 and 3.) A time-share system 
could then be used to identify the unknown compounds 
from the mass spectrum run. A given sample in G.E.’s 
analytical chemistry lab could have 50 Gas Chromat- 
ograph peaks, denoting different compounds and 
different intensities or concentrations. 



Visual interpretation and hand data entry with such 
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Fig. 2. Graphic Output of a mass spectra scan. 
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Fig. 3. Normalized and sorted data from the graph in Figure 2. 
complex possibilities restricted productivity in the 
system. Two or three days were typically required to 
obtain a sample identification. The 4907 File Manager 
was then added to the system, and A.M.S. added a 



software package to identify compounds locally on the 
4051, using the 4907 as the standard compound library. 
The result is a successful and pleasing system with local | 
control and vastly increased speed and productivity. ' 

System Capabilities 

The system has two primary capabilities. One is its ability 
to collect multiple scans from the Mass Spectrometer, 
then search for known compounds to match each scan. 
The other is positive compound identification obtained 
by plotting retention time versus ion current. 

To search for compound matches requires a library of 
standard compounds. The library for this system was 
created by storing the scans from a standard sample kit, 
on the 4907 File Manager. (The fact that this method of 
locally storing a standard library which reflects the 
characteristics of a given system is an added benefit.) 

Searching for compound matches, in its purest sense, is 
quite simple. It requires taking the five most intense mass 
numbers from a scan, then searching through the 
standards library for a match of those numbers. This 
search can require thousands of iterations, but can be 
performed locally, with the 4907 in place, in a fraction of 
the time previously required. 

During a search, the system will display the hit factor (5 
out of 5, 4 out of 5, etc.), probable compound name, 
number, and priority pollutant for each of the run scans^ 
(Fig. 4). Optionally, the system will attach this informa- 
tion to the scan, so the scan can be replotted with the 
found compound information appearing on the graph. 

Plotting retention time versus ion current for any three 
mdss numbers is a powerful tool for positively verifying 
the compound identification. With this routine, any three 
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Fig. 4. Harij Copy output of the search for compouncjs on a run 
file. 
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mass numbers can be selected for plotting during the 
entire run. The desired retention time can then be set to 
tabulate the ratio of intensities between those three mass 
numbers at that retention time (Fig. 5). The three mass 
ratios and the associated retention time verifies the 
probable compound identification. 
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Fig. 5. Graph of retention time versus ion current for three mass 
numbers. 



There are many other useful capabilities in the system, 
such as multiple background correction to compensate 
for column conditions. Also, any amount of mass 
numbers can be deleted from a run before any 
calculations are initiated, to clean up any bad samples 
that may have occurred. Data for each run can be stored 
on the disc for a run library and can be changed or deleted 
at any time. There are also utility commands for 
directories, automatic hard copy and disc to disc 
transfers. 

The key to the successful operation of this system resides 
in the power of the 4907 File Manager coupled with the 
versatility of the Solver One system interface. They have 
made possible a desk-top Gas Chromatograph/ Mass 
Spectrometer system, with data reduction and analysis, 
that produces desirable results at one-third the cost of a 
mini-based system. And the two or three days have been 
reduced to about twenty minutes, with a 405 1 and a 4907 
at the system's heart. (Any inquiries concerning the 
GC/MS data system should be directed to A.M.S. Inc., 
Box 873, Lake Elmo, Mis'" 55042, (612)-439-0022.) 



Science Fair Goes to Space: 

by Terry Davis 

NASA's space shuttle flights, beginning early in the 
I980's, will transform costly and complex space missions 
into routine, economical operations. The hybrid orbiter 
portion of the space shuttle lands like an airplane after its 
orbiting missions, to be checked out and launched again. 
The orbiter's huge cargo bay can carry heavy loads into 
space and bring them safely back again, landing on a 
three-mile strip. The many possible uses of such facilities 
stretch the average imagination. One early entry into the 
program, however, is the project of a 16-year old high 
school junior whose scientific interest and imagination 
made him a natural participant in the space shuttle 
project. And the 4051 is helping him on both ends of the 
project. 

Beginnings 

Bob Wheeler has long been interested in science. The 
sixth grade found him programming simple computers. 
In junior high his teachers allowed him anextra period to 
do science research, and by the ninth grade he was 
teaching science to seventh grade students. During this 
time. Bob did lots of self-imposed research, along with 
science fair projects. His last science fair project was 
measurement of lunar mountains — which placed fourth 
in the General Motors International Science and 
Engineering Fair at Anaheim, Calif. So research beyond 
the bounds of earth isn't new to him. 

In the tenth grade, three busloads of high schoofstuyents 
from the Ogden, Utah, area went to Edwards Air force 
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Space Shuttle Orbiter and 747 Carrier Aircraft. (Reprinted from 
NASA JSCL-157 (U.S. Government Printing Office: 1977 774- 
457)) 




Shuttle Orbiter Carrying Spacelab. (Reprinted from NASA JSCL- 
133 (U.S. Government Printing Office: 1975 671-191/6)) 





Base in Southern California to watch space shuttle tests. 
Bob was in one of those buses and was immediately 
fascinated by the shuttle project, from the expanding tile 
heat shields to the computer-assisted flight. Now Bob is 
sixteen years old and a junior at Weber High School in 
Pleasant View, Utah. He’s well on his way to producing a 
programmable microprocessor-controlled experiment 
for one of the early space shuttle orbital flights. 

A parallel factor in Bob’s space shuttle involvement is a 
North Ogden neighbor, R. Gilbert Moore. He works at 
Thiokol, the manufacturer of the two solid-fuel space 
shuttle motors. When engineers at NASA decided to offer 
for sale portions of the so-called "get-away space, the 
empty test flight payload area, Moore took an immediate 
interest. He reserved several of these cannisters, and 
offered one of them to Weber High School, where his son 
is also a student. Dr. James West, Science Coordinator, 
and Earl H. Heninger, Environmental Center Director, of 
Weber School District, teach advanced placement science 
courses at Weber High School. They immediately saw the 
opportunity for Bob to e.xercise his science and program- 
ming skills, and realize some of his fascination with the 
space shuttle program. With their encouragement. Bob 
started thinking about a project. 

Getting Started 

During June of last year. Bob attended a Space Shuttle 
Mini-Conference at Utah State University. There he and 
the other attendees were told of the requisites for a space 
shuttle project. Bob took particular note of NASA’s Ernie 
Ott. who explained, "One of the biggest problems will be 
designing a controller to coordinate the timing and logic 




Bob Wheeler, North Ogden, Utah, hopes to find the origin of 
cosmic rays. To accomplish this mission, he's sending a 4051- 
developed project along on one of the early space shuttle flights. 
At the left is John Hess, Tektronix Sales Engineer, who aided Bob 
in getting the kit to build the controller. 



of the experiments." Having some experience in digital 
design and in [Programming, Bob began to think of a 
hardware timer as a project controller. 

Two weeks after the Space Shuttle Mini-Conference, Bob 
was back at Utah State University for a National Science 
Foundation Summer Science Training Program. There 
Bob found a 4051 Graphic System in the math depart- 
ment, and got permission to use it. (Having previously 
read 4051 pamphlets, he was anxious to try his hand.) He 
and a friend. Dale Sather. spent all of their spare time 
during the six-week conference developing programs on 
the 4051. Bob says, "As with most people who are 
introduced to the 4051, we were convinced of its 
capabilities after using its powerful BASIC and excellent 
graphics." Bob and Dale even worked their class projects 
on the 4051, so they’d have more time for their own 4051 
application projects. 

One of their projects was a simulation of Apollo from lift- 
off to splash-down; this was a natural with their mutual 
interest in computing and Bob’s love of astronomy. 
Working closely, Bob and Dale read up on Apollo, 
researching facts about the mission. Then they designed a 
model, a simulation of an entire Apollo flight. This effort 
taught the two programmers every 4051 BASIC corri- 
mand. They even looked at the System Software tape 
code to see how operations were performed, and used 
what they learned to speed up their own graphics 
operations. 

After learning that the 4051 was designed around the 
M6800 microprocessor. Bob wanted to know more about 
the 6800. For the next two months he read about the 6800. 
and studied 6800 Assembly Language. He soon decided 
that the flexibility of the 6800 made it a much better 
candidate for the heart of his project, and it replaced his 
hardware-timer idea. Then John Hess, a friend who 
works at the Tektronix Field Office in Salt Lake City, got 
together with Transera Corporation to donate a 
Motorola 6800 Evaluation Kit. Bob suddenly found 
himself with the parts he needed to build a 6800-based 
controller. His project was really under way! 

More for the 4051 

Bob was disenchanted with the time necessary to program 
the 6800 using its own hex code, so his next step was 
developing an assembler for the 6800. Again obtaining 
the use of a 405 1 , Bob developed his own assembler; most 
of it was developed in his room at home over Christmas 
vacation. The assembler runs on the 405 1 and, through a 
special ROM, loads the 6800 controller memory with 
assembly-language programs. This lets Bob use the power 
of the 405 1 and the small size of his 6800 processor for his 
space shuttle project. 

Refining the Project 

Bob soon began to feel that simply flying a working 
contr(>rfijr would be an opportunity missed. He began to 




think of a project that the processor could control, to 
examine some astronomical phenomena. Bob talked to 
the Electrodynamics Laboratory at Utah State University 
and found them willing to help design a cosmic ray 
detector for the project. So he began to plan a method of 
using his 6800-based controller to gather cosmic ray data. 
In the meantime, he thought there must be a way to 
reduce the size of the 6800 board. He called Motorola 
who put him in touch with Erwin Carroll at the Motorola 
plant in Houston. Carroll is now working with Bob to 
refine his controller for use with the cosmic ray detector. 




The Motorola 6800 Evaluation Kit has provided Bob with the parts 
for his project’s controller. The MIKBUG ROM loads his 
microprocessor with hex code sent over the RS-232 from the 
4051. 



The detector will fly with the experiment, delivering an 
analog signal proportionate to the number of cosmic rays 
striking its surface. This signal will be fed to an analog-to- 
digital converter; the digital equivalent is then relayed to 
the 6800. The 6800 will record the cosmic ray intensity 
data on a small magnetic tape unit, along with the time of 
the sensor readings. This data will then be analyzed, after 
the orbiter returns from its mission. 
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To overcome the frustrations of programming in hex code, Bob 
developed his own assembler on the 4051. He inputs to the 4051 in 
mnemoniccodewhichthe4051 segmentsinto hex, and transmits 
to the 6800 microprocessor in the controller. 



While the experiment is in operation, the space shuttle 
orbiter will be pointed in several directions. Thus readings 
will relate to the many directions, or points in space. After 
the mission, NASA will publish a report showing where 
the orbiter was pointed at any given time. Since the tape 
recorder will have intensity data recorded along with 
reading time, the position information can be easily 
extrapolated. The time and intensity data will be used as 
input to the 405 1 , which will analyze the data and provide 
graphic analysis. The hope is that the graph will show the 
general direction of cosmic ray origin in space. 




Bob indicates where his first ROM will plug into his controller. 
Following this will be other ROMs and some RAMs. When NASA 
flips the switch on his controller, it will jump to the first address in 
this ROM and begin the program controlling his experiment. 

The 6800 can handle several different sensors at once. 
Therefore, Bob plans to fly five or six experiments: he's 
designing additional projects with the help of the Elec- 
trodynamics Laboratory. The versatility of the 4051 
Graphic System will allow Bob to look at the data in 
several different ways. 

"So,"' Bob says, "the 405 1 is really the main show." It will 
help develop the programs easily and quickly, and will 
convert them to machine language for the 6800. The 6800 
microprocessor, also the 405 1’s heart, will control the 
experiment in flight. (Bob notes that the 6800 will not 
only control his experiment, but will branch to sub- 
routines to service others’ experiments.) And after the 
Space Shuttle flight returns, the 405 1 will analyze the data 
and provide a detailed graphic analysis. 

Scheduled for Space Shuttle flight number seven, the 
Weber High cannister, with Bob’s controller, will fly early 
in the 1980’s. When it returns, TEKniques will be there to 
cover the conclusion of this ambitious project. 

Editor’s Note: John Hess, Tektronix Sales Engineer at 
Salt Lake City, brought the achievements of Bob Wheeler 
to the attention of TEKniques* staff and arranged for an 
interview' in Salt Lake City with Bob and his father. Dr. 
Bob Wheeler. 
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Modeling and Reporting as Process Controi Monitor 



by Bob Cook 

Previous issues of TEKniques have described the new 
TEKTRONIX Modeling and Reporting software. A 
specific application was described, along with a descrip- 
tion of the capabilities and uses of the software package. 
The following is an example of a typical Modeling and 
Reporting installation in a process control environment, 
in this case, a sewerage treatment facility. 

The agency in question resulted from the consolidation of 
nine city and 26 independent sanitary districts, and is 
responsible for all sewers and sewerage treatment within a 
growing county. The facility handles half of the waste in 
the county, and currently processes an average of 10 
million gallons of wastewater daily. Plant capacity is 20 
million gallons per day, and is expected to grow to 60 
million gallons by the year 2000. 

Applying the Modeling and Reporting System 

When the wastewater (sew'erage) comes to the plant, it is 
full of suspended solids that must be removed; several 
steps are used to do this. After initial filtering and settling, 
the wastewater is placed in aeration basins, where 
microorganisms are introduced. These organisms digest 
the suspended organic solids, producing solids that will 
settle. The settled solids are referred to as sludge. 

After the biological treatment stages, the wastewater 
passes to the chemical purification stages. There, 
chemicals such as lime and aluminum sulfate are in- 
troduced. These chemicals combine with chemical 
pollutants like phosphorus, causing them also to settle 
out as sludge. 

In the next stage, the sludge by-products are thickened, 
dewatered, and incinerated. The remaining processed 
water passes through a final filter, and is then chlorinated 
and discharged into a nearby river, cleaner than the river 
itself. 

The key aspect of this operation is sludge production and 
processing; it must be carefully monitored and controlled. 
The Modeling and Reporting system analyzes sludge and 
phosphorus removal throughout the several processing 
stages. 



Readings for flow in the tanks are taken every midnight. 
The percentage of solids in the flow is checked every two 
hours. Without Modeling and Reporting, these readings 
were jotted down by hand on a form. Analysis was done 
manually when it was deemed necessary. Besides being 
subject to manual calculation errors, these analyses took 
as long as 30 hours to produce. As a result, they were done 
only when absolutely necessary. 

At the same time, the treatment process is slow to respond 
to corrections. This makes it difficult to maintain stable 
operation without readily-available analysis of current 
status and trends. -Modeling and Reporting provides an 
easy-to-use method of obtaining the needed analysis 
whenever desired, to help maintain the stable process. 
Graphics provides a superior way to visualize and track 
process trends. 

With Modeling and Reporting, readings are easily 
entered into the system daily: analysis is available in a 
matter of hours. Reports are presented in neat hard copy 
output, instead of the old handwritten form. Modeling 
and Reporting improves the operation by providing 
timely decision data, with great time savings and without 
manual error. ^ 

Material savings from the stabilized process have not yet 
been quantified, but the time savings is easily calculated. 
The analysis that takes 30 hours by hand can be done in 
four with Modeling and Reporting. Using this calculation 
alone, at a standard hourly labor rate, the Modeling and 
Reporting System could pay for itself in less than 18 
months. Plus, the graphic reports are quickly produced 
and easily interpreted. 

The same kind of process control could be used in new 
water processing plants, or such heavy industries as 
electroplating, casting, chemical laboratories, and pulp 
and paper plants. They could also benefit from the time 
and money savings, coupled with enhanced performance. 
They're all made possible by the 4051 Graphic System, 
with the powerful Modeling and Reporting Software 
package. 



TEKniques a Winner! 

TEKniques recently took part in the annual Com- 
munications Competition sponsored by the Society for 
Technical Communications. We entered the regional 
competition sponsored by the Willamette Valley Chapter 
of the society, and came back with the first place position 



in our category. Our entry has been forwarded to the 
national competition, where it will face other entries from 
electronics, medicine, forestry, and other industries. 



We're very pleased with this achievement. Our winning 
entry would not have been possible without your in- 
teresting applications and tips, so we all share in this 
success. Thank you for the help! 
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Editor’s Note 

Catalogs and Back Issues 

Did you miss an issue of TEKniques, from Volume 1 or 2? 
Or perhaps you haven’t yet gotten your copy of the 405 1 
Applications Library Program Catalog. We have 
catalogs and back issues of TEKniques on hand in the 
TEKniques office. If you’d like to receive a catalog, or 
have been wanting to find a copy of a previous issue of 
TEKniques, drop a note to the Applications Library 
serving you; Library addresses are located at the back of 
each TEKniques issue. 

Program Tip Exchange 

Send in your programming tip. Any one of the following 



4051 Applications Library programs* will be yours when 
it’s published. Simply jot down a brief description of the 
function, the code and your choice of program. Mail it to 
the 4051 Applications Library serving you; Library 
addresses are listed at the back of each TEKniques issue. 
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Business Applications Contest Winners 



The winners have been selected for the TEKniques 
business applications contest. The five winning entries are 
contained in the new abstracts section of this issue by 
TEKniques; the winners are listed below. 



Fourth Place; 







Mallory M. Green also took the fourth 
place honors with TIME SERIES II. It. 
like BARGRAPH II, is useful for 
business and general applications; both 
use the same data format, so they work 
interchangeably. Refer to Abstract \o. 

51 oo-om/o. ” 



First Place: 




Dr. P.C. Holman has contributed 
programs and applications to TEKni- 
ques in previous issues. His winning 
entry is a collection of algorithms for 
business and accounting. See Abstract 
No. 51 00-0904 0. 



Second Place: Robert S. Pilkington, of A.T. & T. Long 
Lines, Bedminster, N.J. contributed a 
program entitled '"Y" Axis Graphs — 12 
Month Format. The program is very 
well documented and flowcharted, and 
makes excellent use of negative 
numbers. See Abstract No. 51/00- 
0905 0. 





R.J. Reimann is an Assistant Professor 
in the Department of Physics and 
Engineering as Boise State University, 
Boise, Idaho. His entry, Regular Plot, is 
a general graphics program developed 
for industrial market analysis. Previous 
contributions to TEKniques include the 
Graphics Demonstration for 
Astronomy and Physics. His prize 
winner is described in Abstract No. 
51,00-0908/0. 



Congratulations to all, and a big 'Thank You!"to all who 
entered. 




Mallory M. Green, a computer 
specialist with the U.S. Department of 
Housing and Urban Development, 
Washington, D.C. has also contributed 
to previous issues of TEKniques. His 
third place winning entry is 
BARGRAPH II, which generates 
professional horizontal or vertical bar 
graphs in a simple interactive manner. It 
is further described in Abstract No. 
51/00-0907/0. 
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Programming 
Tips 



i 



Off-Line Plotting 

by Carl Dawson 
Tektronix, Inc. 

Off-line plotting speeds program execution and frees the 
4051 for other tasks. During program run time, it’s 
quicker to send the graphics commands to tape instead of 
sending them to the plotter with the attendant waiting 
while they are plotted. After the graphics data is 
generated and sent to tape, you can plan the plot files back 
from a TEKTRONIX 4924 tape unit to the 4662 Plotter. 
This technique is especially useful when producing 
multiple plots, or when several users share a single plotter. 

DAB and GDU 

Off-line 4662 plot files require Data Byte Commands 
(DAB) and Graphic Display Units (GDU). DAB com- 
mands program the plotter by passing the command as 
part of the data. As a quick reference, the following is an 
abridged list of DAB commands.; 



MOVE M 

DRAW D 

PRINT P 

HOME H 

ALPHAROTATE R 
ALPHASCALE S 
ALPHARESET A 
PROMPT LIGHT T 



User Data Units are defined by the WINDOW, VIEW- 
PORT, ROTATE and SCALE commands. Four BASIC 
keywords transform User Data Units into device depen- 
dent GDU’s: MOVE DRAW, RMOVE and RDRAW. 
Thus a MOVE @1:X,Y will send the transformed X,Y 
coordinate to device 1. 

To send transformed coordinates to tape requires specify- 
ing the secondary address (MSA). ' If a secondary address 
is omitted, as it is in MOV'E@l;X,Y, the 4051 
automatically generates a secondary address that cor- 
responds to the keyword. The previous command, 
therefore, internally looks like MOVE @1,21:X,Y. This 
default secondary addressing can be overridden.^ MOVE 
@1,20:X,Y will actually execute a DRAW since the 
secondary address of 20 tells the peripheral device to 
DRAW. 

If the default secondary address for MOVE (MSA=21) is 



overridden with the secondary address for the PRINT 
operation (MSA=12), then MOVE(5)l,12;X.Y will print 
the transformed coordinates on the plotter surface 
beginning at the current pen position. To carry this 
example one step further, a MOVE@33, 12:X,Y will print 
the transformed coordinates to the current file on the 
internal tape drive. 

There is one limiting factor. The User Data Units 
specified as X,Y coordinates of the MOVE and DRAW 
statements must lie within the boundaries of the 
WINDOW coordinates. When a draw is clipped, either 
none or two X,Y coordinate pairs will be issued by the 
4051. Consequently, the coordinates of points outside the 
window will not be consistent with the character com- 
mands being printed by the user on the tape. 

PIdt File Format 

Plot files, therefore, contain the appropriate plotter D.AB 
commands and their associated data. Each value 
associated with a particular DAB command must be 
separated by a valid delimiter (space or comma) and each 
command must be followed by a valid terminator which 
may be one of the following: 

1. An ETX byte (Control C) 

2. A CR, comma, or space when the data sent to the 
Plotter is numeric and all expected data values 
have been received. 

Two other terminators are valid in other modes of 
operation, but we’ll ignore them since they aren’t usable in 
the "off-line" plotting described here. 

Building the Plot Files 

For off-line plotting, all plotter commands must be in the 
DAB format and all graphic coordinates in GDU’s. A 
sequence of two BASIC statements specify first the DAB 
command followed by the transformed coordinate: 



•A complete list of secondary addresses is on page B-18 of the 4051 
Graphic System Reference Manual. 

^Secondary addresses can be suppressed. PRINT @l,32:"H" sends the 
character "H" and a carriage return to the plotter without sending a 
secondary address. In this case the plotter treats it as a command 
(HOME). Complete information on I/O addressing can be found in the 
4051 Graphic System Reference Manual beginning on page 7-9. 
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200 PRINT 033: -MM 
210 «OUE 033, 12;X,Y 



Line 200 prints the DAB character for MOVE to the tape 
file; the automatic carriage return (CR) is suppressed. If 
the CR were allowed, it would terminate the DAB 
command before the coordinates were specified. Line 210 
transforms the X,Y coordinate into GDU's and prints 
these values to the tape file. In addition, a CR is generated 
by the print operation in line 210 thereby properly 
terminating the DAB command. 



The following example builds a plot file containing a sine 
wave and a title. Note that all coordinates of the MOVE 
and DRAW commands lie within the WINDOW boun- 
daries. 



100 


REH - PROGRAM TO BUILD PLOT FILE 


1 10 


INIT 




120 


WINDOW a,2tPI , -1 . 1 
UIEWPORT a, 150,0, 100 




130 




140 


FIND 1 




150 


REH - "HOUE" coAHond 


stqucncc 


160 


PRINT #33: "M"l 




170 


MOUE #33,12:0,0 
FOR X-0 TO 2<PI STEP 




180 


2»PI/10« 


190 


REM - "DRAW" command 


•■quanct 


200 


PRINT #33:"D"J 




210 


DRAW #33, 12:X, SIN(X) 




220 


NEXT X 




230 


REM - -MOUE- cownand 


stqutnc* with GDU coordlnat* 


240 


PRINT #33: -H50,90- 


250 


REH - "PRINT* - coAwand stqutnct 1 


260 


PRINT #33:-PSIHE WAUEC* 


270 


REM - -HOME- 




260 


PRINT #33: "H" 




290 


CLOSE 




300 


END 





Since a CR is considered valid data by the print 'T'' 
command, note that the ETX (XO character was used as 
the terminator in line 260. 

Creating Axes 

The AXIS command cannot be used to generate axes in a 
plot file. The AXIS command causes the 405 1 to generate 
a series of moves and draws, sending this information to 
the plotting device with the appropriate secondary 
addresses. Therefore, the AXIS command has to be 
interpreted by the 4051 as it is being executed. 

However, axes can be generated in a plot file by writing a 
short subroutine which performs the same functions as 
the BASIC keyword "'AXIS". This code is discussed in the 
PLOT 50 Introduction To Graphic Programming in 
BASIC in the section entitled "'AXIS: Without Axis 
Command.'" 

Off-Line Plotting 

The plot file tape can now generate a graph on the plotter 
without the 405 1 . Connect a 4924 tape unit to the Plotter 
through the GPIB. Set the Plotter for "LISTEN ONLY" 
and "DAB" modes. That is, the four hexadecimal switches 
on the rear panel of the Plotter labeled "A B C D" should 



be set to "I CO I." Put the 4924 tape unit in manual mode 
by releasing the ON LINE switch (ON LINE button 
should be up, not depressed). Rewind the plot file tape by 
pressing the REWIND button and locate the desired 
file(s) with the SKIP FORWARD or SKIP BACK 
buttons. Start the plot transfer by pressing the TALK 
button on the 4924. When the end of file is encountered, 
the 4924 will stop and the plot can be removed from the 
4662 Plotter. 



Off-Line Plotting Monitored 

You may wish to prompt the operator to change paper on 
the plotter. The following small program will enable the 
4924 to signal the 4051 when it has finished transmitting 
to the plotter. The 4924 talks directly to the plotter which 
frees the 4051 to e.xecute any program not requiring the 
GPIB. When the end of file is detected by the 4924, it 
generates a service request (SRQ) and sets its error 
number to 12. The 405 1 detects the SRQ and signals the 
operator, (ON SRQ THEN ...). 



For this method to work, the plotter must be set for both 
MSA and DAB operations by setting the hex switches on 
the back panel to "1 0 0 1." The 4924 must be placed ON 
LINE by depressing the ON LINE button. The program 
sets up the transfer from 4924 to plotter, waits for the 
SRQ, then prompts the operator to remove the plot. 



100 REM MONITORED OFF-LlHE PLOTTING 
lie INIT 

120 ON SRQ THEM 500 

130 REH 4924 n citvxcc 2i plot on fll« I 
146 FIND f2: I 

150 REM S«t UP “ptriphcral to peripheral" transfer 
160 REM Note •*4" sets 4051 off the GPIB 
178 W&YTE ’466,122,33: 

180 REM Halt Cor execute a BASIC profran) 

190 WAIT 

200 REM Continue, end of file detected 
210 PRINT "CGG Please retiove plot CGC" 

220 END 

500 REM SRQ service routine 

510 POLL I.J12 

520 IF I-l THEM 559 

530 PRINT “CCPOLL ERROR- 

540 STOP 

550 REM Get tape unit error nunber 

560 INPUT t2,30:E 

570 IF E012 THEN 610 

589 REM Untalk i unlisten peripherals 

390 MBYTE #95,63: 

680 RETURN 

610 PRINT "CCCTAPE error HUMBER "|E 
629 STOP 



Keyed File Access on the 4907 

by Jack Gilmore 
Tektronix, Inc. 

The 4907 brings a random access file and record 
capability to the 405 1 . Although 4907 files are accessed by 
name, random access of records still requires the use of 
cardinal numbers (1,2, number of records allocated). 



Sometimes it would be more desirable to access a record 
based upon an alpha string such as a name. Non- 
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sequential groups of numbers, such as a social security 
number, could make a desirable access key. Some 
combination of the two, such as street address, might also 
be useful. 

A method that constructs and searches symbol tables in 
compilers and assemblers is "hashing." The hashing 
method maps the set of keys into a restricted range of 
numbers or "hash codes." In our case, hashing transforms 
the key field such as a last name into a numeric value 
representing 1, ..., number of records. 

Linear Hashing 

The hashing function is chosen so that: 

1 . The computation of the hashing function is rapid; 

2. The mapping of all keys to hash codes is uniformly 
distributed over the range of hash codes. 

These codes are then used as record numbers to access the 
data file in a random fashion. 

To enter a new record, the following procedure is used: 

1. The hashing routine computes a record number in 
the file from the key. 

2. If the key-fieid (first) in that record has the 
initialized value (alpha-blank or numerical-zero), 
the key, followed by the rest of the data for that 
record, is written at that position. 

3. If the key-field is the same as the key for the record 
being inserted, the record already exists. 

4. If the key-field is different than the key for the new- 
record, the hash code (record number) is in- 
cremented by one. If if s greater than the number of 
records in the file, it is reset to one. A check is made 
to see if the record numbers have completely 
wrapped around once. If so, the file is full and error 
action is taken. If not, steps 2 through 4 are 
repeated. 

To recover a record takes a similar operation: 

1. The hashing routine computes a record number. 

2. If the key-field (first) is blank or zero, then the 
record doesn’t exist. 

3. If the key-field is the same as the key for the record 
for which you are searching — Eureka! — ifs been 
found. 

4. If the key-field is different, the record number is 
increased and tested in the same manner as 
inserting a new record. Steps 2 through 4 are 
repeated and an error return is taken if t he record 
does not exist (exhaustive search). 



The following routines implement keyed file access for an 
alpha key. 



> 'jtj ^ ; i. i- ‘ [lA r A • 
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Compare \e\s 
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Reset key 
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The following are advantages of the linear hashing 
method: quick access to a record, not having to read in the 
entire record to check if it’s the right one, no tables to keep 
in memory, the routines to implement the technique are 
small. 

However, once the file is created and initialized, it cannot 
be expanded; to do so would change the mapping of keys- 
to-record placement. This could be a major disadvantage 
in some applications although a program could be written 
to copy a file to a larger one, recomputing record 
placement in the process. 

Another drawback is this: as the file fills up, the average 
number of reads to locate the desired record goes up 
dramatically, as shown in the following graph: 
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Non-Linear Hashing 




Non-linear hashing is another method of implementing 
keyed file access. It overcomes some of the linear hashing 
constraints,' although there are tradeoffs. Non-linear 
hashing allows file expansion, and the records within the 
file do not have to be pre-written with null keys. 


However, the routines are more complicated. A table 
containing record numbers must be retained in memory 
when the file is open and saved on the disc w'hen the file is 
closed. When adding to a file, an entire record has to be 
read and modified. This technique has another perfor- 
mance characteristic demonstrated in the following 
graph: 
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If the file contains a large number of records, the hash 
table length could become unreasonably large to decrease 
the average number of accesses per read. 

The following diagram illustrates the data structure of 
non-linear hashing. 



HASH TABLE 




The following routines implement non-linear hashing. 
Although the hash tables are stored as the first record in 
the file, they could be stored in a separate file. If stored 
separately, the hash table should be chosen independent 
ot the record length. Each entry could also be in a separate 
record, so the entire hash table needn’t be in memory at 
one time. This would require one additional disc access. 
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With the above information, tradeoffs can be made 
between linear and non-linear hashing for any number of 
records. To calculate the number of hash buckets for any 
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size file as a function of the number of disc accesses, the 
following empirical equation is given: 

B is number of hash buckets 
S is number of records 
N is number of reads 

following empirical equation 

A is allocated size 
S is number of records used 
N is number of reads 



Packing Integers 

by Ted Webber 

Laurie, Montgomerie & Pettit Ply. Ltd. 

Sydney, Australia 

The following program saves memory when you're 
storing integers consisting of six digits or less. The 
integers are packed into one real number, complete with 
signs, in the format: 

C = ±A.nB where A and B are each 6 (or less) digit 
integers and n = 0, 1 or 2 to indicate the sign of B 

The sign of B is stored as the first digit after the decimal 
point in C so that 0 = 1 = 0 and 2 “ FNB encodes N I 

into the integer part of N. FNC encodes N2 into the 
decimal part of N. FND decodes N2 and FNE decodes 
NT 



2*N 



= B 



where 



For linear hashing, the 
seems to work: 



2(1+N)S , . 
N 



where 



The first routine generates two arrays of 500 random 
integers, which are then merged into one array of 500 real 
numbers. Partial output is illustrated in Fig. 1. 



118 DEF )♦! .0E-8 

128 DEF FHfiCCt-aCHCC+e. 1 v»ffteSvC)+FHA<0) ) ^ s 

1 39 OEF FHC(C)«3GN<D>8. 1 > * < A8S ( C > * 1 . 9E-7+8. 1 * (SGN<C ) ♦ n ♦ IHT< ABSCD ) > > 
M8 DEF FHD<C)"SGHn0*FHf»<C>-l>»IHTf0.5^10i8008»FHA<l9tFH«(C))> 

150 PEF FHC<C)-IHT<ABS<:C> '>»SGH(C> 

168 Oin N(28«>iNt(200>>H2<20O> 

170 H-0 
180 R-RHO(-l) 

190 Z- 1000000 
200 FOR 1-1 TO 200 
210 2— Z 

220 Hl<I)-INT<RHO(l)*2> 

230 H2<I>-IMT<RMO<l)»2) 

240 NEXT I 

250 FOR I-l TO 200 

260 o-H<n 

270 H<I>-FN8<H1<1)> 

280 D-M(I) 

290 H<I)-FMC<N2<I>) 

380 NEXT I 
310 PRINT -CCC* 

320 DELETE N1.N2 

325 DIN NK200)iN2<2O0> 

330 FOR I-l TO 200 
340 N1<I)-FMC<N(1)) 

350 N2<I>-FNO<N(I>) 

360 NEXT I 
370 PRINT "MC 
380 END 



The second routine packs the integers as they’re input, 
first N1 (statements 230-250) and then N2 (statements 
260-280). Once the real number array is completed, either 
N1 or N2 may be changed without re-computing the 
other. Figure 2 shows random generation of N1 and N2 
using the second routine, and the consequent output by 
changing N1 only through deletion of statement 260-280 



and running from line 210. Figure 3 repeats this process, 
but changes N2 only. 



N1 


-148669 


492183 


-969949 


643160 


-S48S69 


68575 


-955443 


140942 


-S3463B 


928940 


-516749 


482861 


-087424 


488469 


-932999 


985030 


-69920 


143861 


-631351 


317737 


-464439 


49393 


-117673 


403301 


-661820 


95754 


-379642 


353021 


-796499 

N2 


988369 


-571236 


824686 


-87777 


409083 


-475883 


68715 


-405666 


97823 


-204454 


752745 


-436177 


37070 


-29368 


423703 


-535359 


462188 


-626662 


415676 


-36881 1 


572696 


-15186 


798173 


-654777 


960105 


-338661 


559363 


-268461 


718938 


-948991 


66773 


-241950 


217464 


-60729 


230988 


-148669. 808778 


492193.2409 


-969940.847589 


643168.206872 


-040569. 040567 


68575,2997823 


-955443.829445 


148942.275275 


-534638. 043618 


920948.205707 


-516749.902937 


482061.24237 


-887424.033556 


488469.246219 


-952999.862666 


905830.241568 


-69929.836881 1 


143861.257269 


-631351.001519 


317737.270917 


-464459.065478 


49393.2960185 


-117675.033866 


483301.255936 


-661820.826846 


95754,2718930 


-379642.094899 


353821,286677 


-796499.824195 


888369.221746 


-571236.806873 


824686.223899 


1 DECODE M 


-149669 


492193 


-969949 


643160 


-948569 


69575 


-955443 


148942 


-534638 


929940 


-516749 


482061 


-887424 


. 488469 


-952999 


985830 


-69928 


143861 


-631351 


317737 


-464459 


49393 


-117675 


403301 


-661828 


93754 


-379642 


353021 


-796499 


888369 


-571236 


824666 


DECODE M2 . 


-97777 


499893 


-475993 


69715 


-485666 


97823 


-284454 


752745 


-436 i 7T 


57070 


-29368 


423793 


-535339 


462190 


-626662 


415676 


-369911 


5'’2686 


-15186 


798173 


-634777 


968185 


-338661 


559363 


-263461 


71093E- 


-948991 


66773 


-241958 


217464 


-6072? 


230989 



Fig. 1. N1 and N2are shown before being merged intoone array 
(N). N illustrates the packing routine result. The decoded 
arrays depict the Integrity of the routine.. 



100 IMIT 

110 OEF FMR<C>-«8S<C)-IMT<ftB3<C) )♦! .0E-9 

120 DEF «fW8(O-SGHtC + 0. 1 XCfleSf C.^*FH«f0) ) . „ , 

130 OEF FHCCC^-SGH(D-»0. I > » < ABS < C ) » 1 . 0E-7 + 0. 1«<SCNCC)*1 ) * I NT < A8$<D ) ) > 
140 DEF F>«KC)-SGHa0«FHA<C)-l)*IHT<0.5*'l000000*FHA< 10*FNA<C)>) 

150 OEF FNE(C)-IHT(ABSCC) )*SCM<C) 

160 DIN N(5> 

170 N-0 
180 R-RM0<-1) 

190 2-1000000 
200 PRI #32: USI 
210 FOR 1-1 TO 5 
220 Z--Z 

230 N1-IHT(RND<I)«Z> 

240 P-H<I> 

250 N<I)-FN8<N1> 

260 N2-INT<RN0<1)«2) 

270 D-N<n 
290 H<1)-FMC<N2) 

290 N3-fHCCH<n) 

380 H4-F>«KN<I)) 

310 PRINT #32: USING 
320 NEXT I 
330 END 



5X2<9R)17A2<9A)*; *H1"» 'N2" , *N< I ) • . 'HI DECODE* 



•2<9D)90.7D2<9D)*:N1,H2,N<I),M3,H4 



HI 

'636901 

390792 

-5U026 

928230 

-177612 

DEL 260 f 200 

RUH210 

543979 

-436839 

711697 

-997196 

698221 



H2 

-663969 

28762 

-37593 

546080 

-470969 



-479969 

-470969 

-479969 

-479969 

-470969 



H(I) 

-636601 .0663990 
390792.2020760 
-511026.0037560 
928230.2548080 
-177612.0470970 



543970.0663990 

-436039.2026768 

711657.0037580 

-997196.2548080 

690221.0470970 



HI DECODE H2 
-636001 -€63999 



390792 
-51 1026 
928230 



71165; 

-997196 

698221 



28762 

-37583 

548060 



-177612 -470969 



543970 -663989 

-436839 28762 



-37583 

548080 

-470969 



Fig. 2. The first run shows the integers as they’ve been input, 
packed and decoded. In the second run, N1 array has 
been changed, packed and decoded. 



HI 

-501295 

271969 

-942176 

617385 

-264712 

DEL230.25t 

RUN210 

-264712 

-264712 

-264712 

-264712 

-264712 



H2 

-503007 

806404 

-849438 

979883 

-128915 



924541 

•451348 

551745 

-950616 

553110 



H(l> 

-581295.0503010 

271969.2806400 

-942176.0849440 

617385.2979000 

-264712.0128920 



-501295.2924540 

271969.0451350 

-942176.2551750 

617305.0958620 

-264712.2553110 



HI DECODE H2 
-501295 -503007 

271969 806404 

-942176 -849430 

617385 979883 

-264712 -128915 



-501295 924541 

271969 -451340 



-942176 

617385 

-264712 



551745 

-958616 

553110 



Fig. 3. Deletingstatements230through250allowsN2onlytobe 
changed. 
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4907 Data File Storage 

by Chuck Eng and Ed Mitchell 
Tektronix, Inc. 

The 4907 has four data file structures: 

Binary random access 
Binary sequential access 
ASCII random access 
ASCII sequential access 

(This discussion does not include ASCII and binary 
program files.) 

Both the random and sequential files have the same 
physical structure (256-bvte blocks), but random access 
files are broken down into logical records. These logical 
records have pointers to the beginning of each record. 

ASCII Random Access Files 

ASCII random access files must be intialized. That is. 
each record in the file must be completely filled before the 
ne.\t record can be accessed. A quick routine to do this is 
shown on page F-2 of the "4907 File .Manager Operator's 
Manual." Notice that one bvie of each record is allocated 
for the CR; therefore, ASCII random records are 
initialized with a string of record length minus 1 byte (the 
carriage return is placed in the last byte). 

Printing of ASCII random records must be done ac- 
curately. Record boundaries are not detected when 
ASCII records are printed to or input from. If there is 
more data than record space, the data will print over the 
ne.xt record. And, when a file is opened, and an input 
operation is executed that brings in more data items than 
contained in one record, the following record(s) will be 
input. 

The 4907 dynamically e.xtends files. As ASCII random 
files are extended, the records must be completely filled or 
subsequent records cannot be accessed. If you are letting 
the 4907 automatically extend your ASCII random file, 
be sure the data string length equals record length minus 
I; pad the data string with blanks if necessary. 



Binary Random Files 

While Binary random access file records don’t have to be 
initialized in the same manner as ASCII (completely 
filled), something must be written to a binary record 
before the subsequent record can be accessed. The above 
mentioned routine on page F-2 writes 3 blanks to each 
binary record. 

Record boundaries are detected on binary writes and 
reads; therefore, if too much data is written or read for 
the record size, an error message is generated. 



Storage Space 

Data cannot be added to random records; updating a 
record requires rewriting the entire record. Also in- 
dividual random records cannot be enlarged. So knowing 
data storage space requirements is important. 

Both sequential and random access files are expanded 
automatically as space is required. Random expansion 
records are the same length as those originally created. 
Sequential file expansion is in units of 256 byte blocks. 

The following table capsulizes the storage information: 



4907 Data File Storage 




Binary 




ASCII 


Initialization 1 


RanOorr 
No. but 
tilled 


1 Sequential j 

i 1 


Random 

(record 
lengtn 
minus 1) 


j Sequential i 

j 1 

I ■ 


Slrinqi; , , ; 


Overr»ea<t 


4 bytea 


: 5 bytes 


1 byte 


1 byte i 




per atrmq 
plus t 
byte per 
record 


pe^r string 

! i 


pw’ 

record 


1 per stnng 


Per cnar Krter- 


1 byte 


1 byte 


1 byte 


1 byte 


Numeric Data; 
Overnea-o: 


1 byte 


1 byte 


1 bvle 


1 byte 


Per ywue: 


D«r record 


p«f record 


per record 


per record 


9 bytea 


9 bytes 


1 byte 


1 byte 


End erf Record 
Seoarator 


Yes 


N, A 


No 


N/ A 


1 Defection 










End ol File 


Mama 


Yes 


; Yes 


Yea 


Yes 



Coordinate Transformation 

by James R. Umdenstock 
City of Tulsa, Oklahoma 

The City of Tulsa is presently assembling a graphic data 
system that includes all major buildings, streets, water 
and sewer lines, address centroids (building centers) and 
the like. This will be a major data system for use by all city 
departments. 

One of the problems associated with constructing such a 
data base is that separate and detached surveys and maps 
will meet harmoniously, without gaps or overlaps. 
Therefore, we have developed a routine which converts 
points on the digitizer to state plane coordinates. 

A map may be placed anywhere on the Summagraphics 
digitizer table interfaced to the 4051 Graphic System. As 
the ground points are digitized, the 4051 quickly converts 
them to state plane coordinates and stores them on tape. 
The data is then transmitted to the host computer over the 
Option 1 Data Communications Interface. 

Since state plane coordinates are an established and 
understood system, this is a very practical program for 
land mapping use. 
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The logical unit number for the digitizer is 

This printout is from the host computer, usinie the Option 1. 



Data Transfer Through the RS-232 

by Mark Mehall 

Tektronix, Inc. 

Chicago 

Two small programs allow one user (User 1) to control 
tape-to-tape transfer of data to or from another 4051. 
This is especially helpful if the other 4051 user (User 2) is 
unfamiliar with data communication procedures. 

Preparation 

Each user connects their Option 1 to their modem, 
through the RS-232 cable supplied with the 4051. Both 
modems are set either to full duplex or to half duplex; the 
4051s and the modems are then powered up. 



188 REH RROCRAH TO SET 4®M 5^^. 1 PftRAHETERS 
U0 REH FOR TAPE TRANSFER TO ANOTHER 4031 

130 REN^SCT L» TO CTRL-L <NEHPACE> 

150 REh'^SET^J* TO CTRL-J (LINEFEED) 

170 REH^SErSi TO CTRL-C (BELL) 



180 C«-%G5G’ 
190 REH SET F 



iCiiJ* 



.Gf 



'first file TO 0 

4051 TO 4051 TAPE TRANSFER- ? . 

220 PR NT -THE OTHER 4031 USER SHOULD USE THE DEFAULT PARAMETERS,* 

Hi PR NT -AHD SHOULD BE IN TERMINAL M0DE.-|Ji 
24* REM INITIALIZE THE COMM. INTERFACE 

2I0 REH^SEt"tSTRIH TO MATCH DEFAULT RSTRIH PARAMETERS 
270 REM SET R» TO CTRL-R (DC2) 

280 R»-CHR(10) , 

290 REM SET Tl TO CTRL-T (DC4) 

300 T*»CHR(20) 

310 REM SET D$ TO CTRL-D (EOT) 

320 D«*CHR(4> ' ^ 

ill REMS£^^TCR^F’T0’SUPPRESS CARRIAGE RETURNS 
3 IS SemSet'^RCRL^®^’ PRINTED CONTROL CHARACTERS 
300 REH''lHniALI2E'THE INTERFACE 
400 REM^IMITIALIZE FILE NUMBER 

429 PRi5t -HON MANY FILES ARE BEING TRANSMITTED? -lC»l 

430 INPUT F 

REM fTno^the tape file to be transferred 

460 PRINT *NNAT TAPE I?c?f 

470 PRINT *THC LAST FILE HAS |Fll IG»I 
490 INPUT FI 
490 find FI 

i .-.cue 

ns sir«!?‘fc5';‘?sjHi«?rsroi-Fn:usE cthe, <3h<,stc> 

I 2 S in‘'oO*TSrTMHSFER 
ns «IHT'n!n°iR»HSmTTE05C.- 

650 PRINT 040: JS| J»t J»l -FlU r«c«tv€<*. 

670 PR?MT^040; Jfl -FiTMil fil€ 

680 PRINT 040: Jf* 'Pick UP wour headset 
690 END 

Fig. 1, Routine to control transfer to another 4051 over the 
Option 1, 

I A* eeit MOCRAM TO SET 4051 OPT, 1 PARAMETERS 

110 ^M ^*F 0 R TAPE Transfer from another 4051 

IzS SI" SE1 L« TO CTKL-L <MEUP«CE> 

13S mS^SeVj, to CTRL-J alHEFEEO) 

IcS REr'sEt'c, to CTRL-0 (BELL) 
iSS reS'bet'firbt file to a 

i?8 ssr« OTHER osES'iioJSo^Sil ISrolSSSII^MIdRa.- 

IIS RR St -rSo IhouloIe'ih rERmHRL hode.-,j. 

230 REM INITIALIZE THE COMM. INTERFACE 

i?S REH*'BCT”RSTRiH TO HATCH DEFRULT T8TR1H RSRRHETERS 

iSS REH Set H. TO CTRL-, (HUD 

IIS SSS'SIl'I. TO CTRL-S <DC3> 

IIS S|S3‘Si TO CTRL-O (EOT) 

111 E'^S’IolcWsIh* 

is, REli''aET“RCRLF’T0'RRlHTED COHTROL CHARACTERS (FOR LIHE FEEDS) 
irS REH'"SErFRCR’!fofccE CARRIaOE RETURN) TO , (HO) 

ISS iSI'-llll'iSIui’lSi'lHTERFACE 

1*8 PRINT IhOH^HAHT files ARE SEIHC RECEIUEOT -iCI 

420 INPUT F 

430 FOR 1"1 TO F 

450 PRTHT^L0.'HHArTlpE^nLE°I^ t)ATA? * 

460 PRINT 'THE LAST FILE HAS *lFll IGII 
470 INPUT FI 
480 FIND FI 

IS* reh"seho instructions to the other USER 
310 REM SET Ef TO CTRL-C (ESC) 

320 *R - 4031 TO 4051 TAPE TRANSFER* 

340 PRINT {JtlJiljil-Uee Function Kew 13 (shift 3) to find t^ flic* 

360 PrInT 040:jIl*P?t5! RETURNrThJ; pr«i Function Kej *.* 

fi IS s? ;i8!isi7.vuii*f.:ii:.ir£ r-'“ "" 

£10 CALL “OTRCCU" 

si: ssik; ;sjv5.i5siisi5i5u .F...Hm«. m».u, 

«• PRINT Vt:JSIJ,IJai‘Ft"«l ■' 

660 PHIHT t4i;jt|*Plck UP your htttdatt. ,Gi 
678 END 

Fig. 2. Routine to control transfer from another 4051 over 
the Option 1. 



( 



The user who is receiving the data marks a tape for the 
number and size of files required for the incoming data. 
User 1 loads the applicable program below (sending or|^ 
receiving) into 4051 memory. User 2 types in CALL 
"CMINIT” on the second 4051 and presses the RETURN 
key, then types in CALL "TERMIN'' followed by a 
RETURN. 
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Data Transfer 

Establish telephone contact (either one can dial the 
other). One user sets their modem to answer (ANS) mode 
and lays their headset into the modem cradle ( note where 
the cord end is placed). The other user sets their modem to 
originate (ORIG) and listens for the frequency signal; 
then sets their headset into the modem cradle. When 
contact is established, the carrier light on the modem will 
come on; the 4051 will stop flashing its lights. 



checksum, no header format of the 4923. The next steps 
determine the record separator, end of file mark, and 
incoming character(s) to be deleted. After the alternate 
parameters are input, statement 230 instructs the 
microprocessor to use these when the sign is used in 
place of the sign on INPUT, OLD or APPEND 
commands. 

The rest of the routine reads the tape and resets the status 
bytes. 



Now the program in User 1 4051 memory is run. Users 
each respond to the prompts on their 405 1 screen, and the 
data transfer is carried out. When transfer is completed, 
load one of the files into the receiving 4051 to verify. 

A related and informative article is contained in TEKni- 
ques Vol. 1 No. 4, "4051s Talk To Each Other." 



Changing 4051 Parameters to Read 
Different Tape Formats 

by Aaron Eisenbach 

Tektronix, Inc. 

Baltimore, MD 

The 405 1 can easily adapt its ASCII input format 
requirements to the ASCII output formats used by 
ditierent peripheral devices. A customer recently logged 
data on the Tektronix 4923, and then read it into the 405 1 
using the following routine. 

Statement 120 changes the status b\le for the internal 
magnetic tape unit so it can read the 1 28 byte length, no 



let 

119 

129 

130 
140 
I 50 
t£0 
170 
180 
190 

299 
219 
229 
219 
240 
250 
260 
278 
280 
290 

300 
318 
320 



INPUT 
PPIHT f33,0: 1,1,1 

PRINT -JJCI USE THE DECIMAL EQUIUALEHTS OF THE* 

CHARACTERS FOR THE FOLLOWING IHPUTS" 
PRIMT 'JJJO RECORD SEPARATOR 7 : 

INPUT A1 

END OF FILE HARK ? : 



PRINT *JC« 
INPUT A2 
PRINT 



INPUT AL 
PRINT *JC4 
INPUT F 
PRINT #37,a;Al,A2,AJ 
PAGE 

OH EOF (0) THEN 300 
FIND F 
INPUT k33;AI 
PRINT Af 
GO TO 270 
PRINT 137,26:0 
PRINT »33.0:0,0,0 
PRINT *JJCD0HE* 



character to be DELETED 

data file • : "I 



(ENTER 129 IF NONE) 






Caution should be used when specifying an alternate 
record separator. If an ASCII data string contains both 
Carriage Return characters and the alternate record 
separator character, logical records could be lost. To 
avoid this, specify the character to be deleted (statement 
190) as "13." This will delete all incoming Carriage 
Returns but will read all logical records. 

For a complete discussion on magnetic tape status 
parameters, see the "4051 Graphic System Reference 
Manual, " pages 2- 1 9 to 2-2 1 . Check pages 2-25 to 2-30 for 
detailed information on processor status parameters./*?) 




Program Byte Counter 

by Leo J. LaFrance 

New Mexico State University 
Las Cruces, NM 

This routine quickly determines the minimum space 
required by an ASCII program file. It analyzes a file 
already on tape and, if requested, will re-mark the file and 
re-store the program. Note that the file should be the last 
one on the tape. 



LIS 






108 


INIT 




118 


CI-CHR(I3> 




120 


DIH Af(HEHO«Y-300) 




130 


Al«*- 




148 


OH EOF <0) THEN 230 




1S0 


PRINT “Llnsrrt tape and input nunbar of 
PRINT *to bt analyzed. *I 


file * 


160 


170 


INPUT F 




188 


FIND F 




190 


INPUT #33: Rl 




288 


RI«RtiCf 




210 


A#-REP(Rt,l+LEM<RI),0) 




220 


GO TO 190 




230 


PRINT 'JJRSCII file requirei •JLEN(AI>|‘ 


’ bytes. * 


240 


PRINT 'HiniMUH is 768 bytes.* 


250 


print "If you want the file re-sized, snter * 1 


260 


PRINT '^YES.' caution: YOUR TAPE WILL 


BE *1 


270 


PRINT "RE-HARKED. *1 


280 


INPUT Gt 




290 


IF GiO-YES* THEN 340 




300 


FIND F 




310 


HARK 1,LEN<AI>41 




320 


FIND F 




330 


PRINT «33:AI| 




340 


END 
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4051 Applications Library 
Program Abstracts 

Order 

Documentation and program listings of each program are 
available for a nominal charge. Programs will be put on tape for a 
small recording fee per program plus the charge for the tape 
cartridge. One tape will hold several programs. (The program 
material contained herein is supplied without warranty or 
representation of any kind. Tektronix, Inc. assumes no respon- 
sibility and shall have no liability, consequential or otherwise, of 
any kind arising from the use of this program material or anv part 
thereof.) 

Domestic U.S. Prices: 

Documentation and listings $15 per program 

Recording Fee 2 per program 

Tape Cartridge 26 per tape 




ABSTRACT NUMBER; 51/00-0904/0 



Contribute 

Contribute one program to the Library and receive three in 
exchange. Send in the membership card from your 405 1 Graphic 
System Reference Manual to get the details. Orcallus(503)682- 
3411, ext. 2618. 

Forms 

Please use the Applications Library Order Form. Order forms 
are included in the Membership Packet and are available from 
your local Tektronix Sales Engineer. 

Outside U.S. 

Program contributions or orders outside the U.S. must be 
processed through the local Tektronix sales office or sent to one 
oj (he U hr aries serving your area. See Library Addresses section. 



6. StHtistics, Correiationi A set of programs deter- 
mining the statistical correlation between sets of 
data. 

/. Statistics; Index Number Formulas: A set of 
programs determining the index values for several 
sets of data. 



Title: Business & Accounting Formulas 
Author: Dr. P.C. Holman 

University of Wisconsin 
Stevens Point, WI 
Memory Requirement: 32K 
Statements: 7698 
Files: 19 ASCII Program 

A turorial program containing formulas, statistics and 
tables in the following areas: 

1. Simple Interest Formulas: A set of eight formulas 
used to compute simple interest. 

2. Compound Amount Formulas: A set of programs 
determining the dollar amount that an account or 
loan is worth now, or would be worth at some future 
time. 

3. Annuities: A set of programs determining the value 
of an annuity. They handle any kind of annuity, as 
well as determining what one would have to pay if 
one set up an annuity. 

4. Statistics; Averages and Variation Formulas: Aset 
of programs for solving statistics most commonly 
used in business. 

5. Statictics; Sampling; A set of programs determining 
statistical sampling parameters. 



8. Statistics: Time Series Formulas: A set of programs 
determining secular trends, seasonal changes, and 
cycles. Used to determine what quantity a firm 
should produce during given periods of time. 

9. Inventory Formulas: A set of programs used for 
inventory assessment. 

10. Depreciation Formulas: A set of programs allowing 
calculation of depreciation. 

11. Finance Section: A set of formulas used for financial 
analysis. 

12. Price Level Adjustments: A set of programs used to 
convert long term liabilities (i.e. depreciation, A P) 
into current dollar values. 

13. Marketing Formulas: A set of programs used to 
calculate the selling price a retailer or wholesaler 
should use to obtain the profit desired. 

14. Cost and Production Formulas: A set of programs 
used to determine the cost and production 
relationships of various products and payroll 
billings. 

15. Ratio Analysis Formulas: A set of programs presen- 
ting basic accounting ratios as well as time periods 
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for such things as production and inventory turn- 
over, and collection periods for various accounts. 

16. Single Entry Formulas: A set of programs used to 
determine income statement entries for sales, 
purchases, expenses, and inventories. 

17. Miscellaneous Formulas: A set of programs that are 
useful in business, but that do not belong in the 
major groupings previously described. 




ABSTRACT NUMBER: 51/00-0905/0 

Title: Axis Graph — 12 Month Format 

Author: Robert Pilkington 
AT&T Long Lines 
Bedminster, NJ 
Memory Requirement: 24K 

Peripherals: Optional— 4610/463 1 Hard Copy Unit 
Statements: 568 
Files: 1 Program 
4 Data 

A solid line curve, a dashed line curve, shaded bars, or any 
combination of the three can be created easily on a graph 
with titles and labels by using this monthly scale 
adjustable "Y" axis graphing program. 

All titles and labels are automatically spaced and centered 
around the axis. Up to four main title lines can be entered 
with one "X"' axis title, a three position "Y" axis title, and a 
legend label for each plot curve. The user can select bar 
shadings as well (empty bars, solid fill or cross hatch). A 
parameter and data listing can be accessed before or after 
the graph is diplayed. 

Data for all three plot modes can be added, deleted or 
changed. All data and parameters can be saved or 
retrieved from pre-marked binary files on the same 4051 
data cartridge. 

Limitations: "'Y" axis tic labels up to six characters using 
whole numbers and seven characters using decimal 
numbers including decimal point and dollar sign. The 
scales must be positive numbers. The size and position of 
the graph on the screen is constant and stationary. 




ABSTRACT NUMBER: 51/00-0907/0 

Title: Bargraph II 
Author: Mallory M. Green 

U.S. Dept, of H.U.D. 

Washington, D.C. 

Memory Requirement: 32K 
Peripherals: 4662 Plotter 

Optional — 4907 File Manager 
Statements: 1493 
Files: 4 ASCII Program 
4 Binary Data 

A program designed to generate professional horizontal 
or vertical formatted bar graphs in a simple interactive 
manner. 

Features of the program are: 

1. Horizontal and vertical bargraph formats. 

2. User-prompted keyboard entry of all titles, labels and 
data. 

3. Interactive modification of titles, labels, or data via 
user keys. 

4. Storage of complete chart descriptions on either tape 
or disc files for future modification and plotting. 

5. Output drawn on either the screen or 4662 Plotter. 
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6. 4662 Plotter outputs in one or more colors. 

7. Automatic layout of centered and proportional 
charts. 

8. TIMESERIES II and BARGRAPH II are fully 
compatible. 



XYZ CORPORATICrJ 

FOUR YEAR COMPARISON OF OPERATIONS 
ACTUAL TIME LOGGED ON TERMINAL LOG 




R -2501. 
S 



-sa0L 





ABSTRACT NUMBER: 51/00-0906/0 

Title: Timeseries II 
Author: Mallory M. Green 

U.S. Dept, of H.U.D. 

Washington, D.C. 

Memory Requirement: 32K 
Peripherals: 4952 Joystick or 4662 Plotter 
Optional— 4907 File Manager 
Statements: 1157 
Files: 3 ASCII Program 
4 Binary Data 

A program designed to generate professional timeseries 
charts in a simple interactive manner. 

Features of the program are: 

1. Can draw up to 6 lines for up to 35 time periods. 

2. Time periods such as seconds, minutes, hours, days, 
weeks, months or years can be used. 



3. User-prompted keyboard entry of titles, labels, and 
data. 

4. Allows interactive modification of titles, lables, and 
data via user keys. 

5. Chart descriptions can be stored on either tape or disc. 

6. Utilizes all 20 user-definable keys for maximum 
flexibility. 



7. TIMESERIES II and BARGRAPH II are fully 
compatible. 
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ABSTRACT NUMBER: 51/00-0908/0 

Title: Regular Plot 
Author: R.J. Reimann 
Memory Requirement: 32K 
Peripherals: 4662 Plotter 

Optional — 405 1 R05 
Statements: 862 
Files: 1 Binary Program 
1 Binary Data 

A general graphics program developed for industrial 
market analysis. It provides line and bar plots with 
regularly spaced X-axis entries. Features include: 

1. Auto-scaling of the Y-axis. 
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2. Line addition/deletion capability. 

3. Labels and data correction. 

4. Allowance for negative data. 

5. Aligned data tables. 

6. Data storage/ recall. 

7. Linear regression. 




ABSTRACT NUMBER 51/00-9531/0 

Title: Slidemaker II 

Author: John R. Carter 

Tektronix, Santa Clara Annex 
Memory Requirement: 32K 
Peripherals: 4662 Plotter 

Optional — 4907 File Manager 
Statements: 679 
Files: 1 ASCII Program 
1 ASCII Text 

Slidemaker II offers a highly versatile tool for creating 
professional and sophisticated presentation aids. 

The main features are: 

1. Standard type sizes selected with a single variable. 

2. Tab selections that operate like a typewriter. 

3. Variable type sizes and color changes possible on the 
same line of type, including choice of bold or normal 
type on the same line. 

4. Fast line centering. 

5. Input a whole page of text in one operation, with only 
one pen setting at the beginning. 



6. Save and retrieve plots on either cartridge tape or disc 
in the same program. 

7. Edit text at any time. 

8. Alter retrieved plot and save new plot in same or 
separate file. 

9. Graphics symbols available: Line, Box, or Diamond. 
Draw anywhere on plotter surface. 




TEKTRONIX Announces 4050 
Catalog: Vendor Supplied Software 
and Services 

TEKTRONIX will be producing a catalog of software 
and programming services for the 4051 Graphic Com- 
puting System available from companies and consultants 
not associated with TEKTRONIX. The catalog will be 
sent directly to current 4051 users and to our worldwide 
sales organization. 

Software products will be listed in the catalog by 
application area. Programming services for the 4051 will 
be listed by geographic location. Customers will contact 
the advertiser directly for additional information. 
TEKTRONIX does not endorse or warrant any products 
or services listed. 

Listings are restricted to Software Packages written 
exclusively in 4051 BASIC. 

For a direct avenue to the market for your 4051 software 
products and programming services, complete the enclos- 
ed form and return it to: Catalog Listing, Group 452, 
Tektronix, Inc., P.O. Box 500, Beaverton, OR 97077. 
More forms may be acquired by writing to this address. 
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Ibktronix 

COMMfTTED TO EXCELLENCE 



TEKTRONIX, INC. 
Information Display Group 
Applications Library 
Group 451 
P.O. Box 500 
Beaverton, Oregon 97005 



i;rn:LLA mcmorran 

60-307 

IF YOU HAOEI MOOED 
PLEASE CALL 2618 



MPK 2 6 



ADDRESS CORRECTION REQUESTED 



4051 Applications Libraries 




Africa, Europe, Middle East 


Canada 


Japan 


4051 Applications Library 


4051 Applications Library 


4051 Applications Library 


Tektronix International, Inc. 


Tektronix Canada Ltd. 


Sony Tektronix Corporation 


European Marketing Centre 
"Bavinckstaete'' 


P.O. Bo.x 6500 


9-31 Kitashinagawa-5 
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1183 at Amstelveen, The Netherlands 
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Canada L4M 4V3 
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Tektronix, Inc. 


Tektronix Australia Pty. Limited 


Ms. Bev Brandon, 73-312 


Group 451 


Sydney 


Export Marketing 


P.O. Box 500 


80 Waterloo Road 
North Ryde, N.S.W. 2113 


Tektronix, Inc. 

P.O. Box 500 
Beaverton, Oregon 97077 
U,S.A. 


Beaverton, Oregon 97077 





